Sports Illustrated for Kids - Awesome Athletes!/Sports Illustrated for Kids - Awesome Athletes!.iso/shared.dir/07001_Exit App.ls

Text File | 1996-04-18 | 693 b | 27 lines

global gSICDPath

on exitApp
  SetCursor(#wait)
  puppetSound(0)
  set the fileName of window "quit" to gSICDPath & "quit"
  set the modal of window "quit" to 1
  set the windowType of window "quit" to 2
  set the visible of window "quit" to 0
  set vRect to the rect of window "quit"
  set vLeft to the stageLeft + 320 - (getAt(vRect, 3) / 2)
  set vRight to vLeft + getAt(vRect, 3)
  set vTop to the stageTop + 240 - (getAt(vRect, 4) / 2)
  set vBottom to vTop + getAt(vRect, 4)
  set the rect of window "quit" to rect(vLeft, vTop, vRight, vBottom)
  open(window "quit")
  pause()
  SetCursor(#normal)
end

on exitApp2
  tell the stage
    HideAllSprites()
    navGoTo("end")
  end tell
end